#!/usr/bin/perl -w
use strict;

@::mods=qw(
	Class::Loader
	Compress::Zlib
	Convert::ASCII::Armour
	Crypt::Blowfish
	Crypt::DES
	Crypt::Primes
	Crypt::Random
	Crypt::RSA
	Data::Buffer
	Digest::MD2
	Digest::SHA1
	Filesys::DfPortable
	Math::Pari
	Sort::Versions
	Tie::EncryptedHash
	Time::HiRes
	XML::Parser
);

my $errs=0;
for my $cmod (@::mods) {
	printf("%-25s : ",$cmod);
	eval "use $cmod;";
	if($@) {
		print "Missing (or failed to load)\n";
		$errs++;
	} else {
		print "Ok\n";
	}
}
exit(1) if $errs;
exit(0);
